"Cars93.summary" <-
structure(list(Min.passengers = c(4, 6, 4, 4, 2, 7), Max.passengers = c(6, 
6, 6, 5, 4, 8), No.of.cars = structure(c(16, 11, 22, 21, 14, 
9), .Names = c("Compact", "Large", "Midsize", "Small", "Sporty", 
"Van")), abbrev = c("C", "L", "M", "Sm", "Sp", "V")), .Names = c("Min.passengers", 
"Max.passengers", "No.of.cars", "abbrev"), row.names = c("Compact", 
"Large", "Midsize", "Small", "Sporty", "Van"), class = "data.frame")
